home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 14p.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-06  |  2.0 KB  |  81 lines
  1. on startMovie
  2.   global gKnobState, gKnobSprite, gSendMovie, gCursorReady, gplaybtnsprite, gFNEngBtnSprite, gPcVidSprite
  3.   gKnobSprite = 14
  4.   gSendMovie = "04p"
  5.   gplaybtnsprite = 0
  6.   gFNEngBtnSprite = 24
  7.   gPcVidSprite = 11
  8.   puppetSprite(gFNEngBtnSprite, 1)
  9.   puppetSprite(48, 1)
  10.   gCursorReady = 1
  11.   gKnobSprite = 14
  12.   gSendMovie = "14p"
  13.   gKnobState = 1
  14.   puppetSprite(gKnobSprite, 1)
  15.   setUpKnob()
  16.   set the mouseDownScript to EMPTY
  17.   set the mouseUpScript to EMPTY
  18.   sprite(24).visible = 0
  19. end
  20.  
  21. on stopMovie
  22.   global gplaybtnsprite, gFNEngBtnSprite, zeoIdle
  23.   puppetSprite(gFNEngBtnSprite, 0)
  24.   gplaybtnsprite = 23
  25.   zeoIdle = 0
  26. end
  27.  
  28. on idle
  29.   global gCursorReady
  30.   if gCursorReady = 1 then
  31.     cursor(200)
  32.     checkCursors()
  33.     set the locH of sprite 48 to the mouseH
  34.     set the locV of sprite 48 to the mouseV
  35.     updateStage()
  36.   end if
  37.   qtidle()
  38. end
  39.  
  40. on checkCursors
  41.   global zeoIdle
  42.   setzeoIdle()
  43.   set the castNum of sprite 48 to the number of member "curs1"
  44.   repeat with i = 15 to 17
  45.     if rollOver(i) then
  46.       set the castNum of sprite 48 to the number of member "hotCursor"
  47.     end if
  48.   end repeat
  49.   if the castNum of sprite 19 and rollOver(19) then
  50.     set the castNum of sprite 48 to the number of member "hotCursor"
  51.   end if
  52.   repeat with i = 20 to 22
  53.     if the castNum of sprite i and (rollOver(i) and not zeoIdle) then
  54.       set the castNum of sprite 48 to the number of member "hotCursor"
  55.     end if
  56.   end repeat
  57.   repeat with i = 31 to 32
  58.     if rollOver(i) then
  59.       set the castNum of sprite 48 to the number of member "hotCursor"
  60.     end if
  61.   end repeat
  62.   repeat with i = 40 to 42
  63.     if rollOver(i) then
  64.       set the castNum of sprite 48 to the number of member "hotCursor"
  65.     end if
  66.   end repeat
  67.   if the castNum of sprite 47 and rollOver(47) then
  68.     set the castNum of sprite 48 to the number of member "hotCursor"
  69.   end if
  70. end
  71.  
  72. on setzeoIdle
  73.   global gPcVidSprite, zeoIdle
  74.   zeoIdle = 0
  75.   if the memberNum of sprite gPcVidSprite > 0 then
  76.     if sprite(gPcVidSprite).movieRate > 0 then
  77.       zeoIdle = 1
  78.     end if
  79.   end if
  80. end
  81.